Ｔｉｎｙ　ＦＯＲＴＲＡＮ　ＦＯＲＭ
―――――――――――――――――――――――――――――――――――――――
Ｉ／Ｏ　１９８０年　５、６、７、８、９月号掲載
ＭＺ−８０
マシン語

起動方法
モニタからロード
―――――――――――――――――――――――――――――――――――――――
[４]ステートメントの展開

皆さん、ＦＯＲＭを使用してみていかがでしたか？
今、私たちのもとにＦＯＲＭに関しての
手紙や電話がたくさん届いています。
貴重な意見をありがとうございました。
さて、先月号では『式の展開』について、述べたので、
今月はそれ以外の『ステートメントの展開』について解説していきます。

―――――――――――――――――――
ステートメントのコンパイル
―――――――――――――――――――
１）ＧＯＴＯ文
ＦＯＲＭの構造については、５月号ですでに述べた通り、
単純な１パス型となっています。
ＧＯＴＯ文の展開は、
まず、この１パス型であるということを頭に入れて、
考えなければいけません。
実際的な展開は非常に単純で、
単に文番号を物理的なメモリ、アドレスに変換し、
そのアドレスにジャンプするようＪＭＰ命令を置くだけです。
ＧＯＴＯ文で問題となるのは、
アドレスをいかに決定するか、ということです。
次の簡単なプログラムを見てください。
・−−−−−−−−−−−−−−−−−・
｜　　　　　　Ａ＝０　　　　　　　　｜
｜　　　１０　Ａ＝Ａ＋１　　　　　　｜
｜　　　　　　ＧＯＴＯ　１０　　　　｜
｜　　　　　　ＥＮＤ　　　　　　　　｜
・−−−−−−−−−−−−−−−−−・
このプログラムで、
文番号１０はそこに飛ぶべきＧＯＴＯ文よりも前にあるので、
この文を展開したときの先頭アドレスと文番号のテーブルを作って、
そこにしまいます。
こうしておくことによって、
次に出てきたＧＯＴＯ文は、飛び先きの文番号によって、
先ほど作ったテーブルをサーチすれば、苦もなくアドレスの生成ができます。
これは、ＧＯＴＯ文よりも前に対象となる文番号が存在する場合に有効です。
しかし、次のようなプログラムの場合はどうでしょう。
・−−−−−−−−−−−−−−−−−・
｜　　　　　　ＧＯＴＯ　１０　　　　｜
｜　　　　　　Ａ＝１　　　　　　　　｜
｜　　　１０　Ｂ＝１　　　　　　　　｜
｜　　　　　　ＥＮＤ　　　　　　　　｜
・−−−−−−−−−−−−−−−−−・
このようなプログラムでは、ＧＯＴＯ文の方が対象文番号よりも先に
出現してしまい、先はどのテーブルは意味を持たず、
アドレスは未定になってしまいます。
普通、このような場合には２パス型を採用し、
２度のコンパイルによって文番号のアドレスをすべてテーブルにしまっておき、
これによってＧＯＴＯ文などのアドレス生成を行ないます。
ＦＯＲＭでは先にも述べた通り、１パス型を採用しているため、
アドレス・テーブルを作ってから再度コンパイルという方法は取れません。
では、どのようにして文番号を処理しているのでしょうか。
ＦＯＲＭではまず文番号に関して２つのテーブルを用意します。
１つは、先ほど述べた、すでに出現している文番号とそのアドレス用で、
他の１つは、まだ出現していない文番号を指す、ポインタ・テーブルです。
前者のテーブルの管理は簡単に行なえますが、
後者は少し、やっかいなテーブルです。
これの理解を助けるために、図１をよく見てください。

　　図１　文番号管理テーブルの動作
・−−−−−−−−−−−−−−−−−−−−−−−−−−−−−−−−・
｜　　　　　ＧＯＴＯ　１０００　　　　　　　　　　　　　　　　　　｜
｜　　　　　　　↓　　　　　　　　　　　　　　　　　　　　　　　　｜
｜　　　　　ＡＤＲＳ　　ＯＰ　　　　　　　　　　　　　　　　　　　｜
｜　　　　　２Ｃ００　Ｃ３（Ｅ８　０３）→　文番号が出現していな　｜
｜　　　　　　：　　　　　　　↓　　　　　いのでアドレス不定。ア　｜
｜　　　　　　：　　　　テーブルＢに　　　ドレスの代りに文番号を　｜
｜　　　　　　：　　　　ロケーション　　　入れておく。　　　　　　｜
｜　　　　　　：　　　　を記憶　　　　　　　　　　　　　　　　　　｜
｜　　　　　　：　　　　　　　　　　　　　　　　　　　　　　　　　｜
｜　　　　　　：　　　　Ｂ→２Ｃ０１　　　　　　　　　　　　　　　｜
｜　　　　　　：　　　　　　　　　　　　　　　　　　　　　　　　　｜
｜　　　　　　↓　　　　　　　　　　　　　　　　　　　　　　　　　｜
｜１０００　ＳＴＯＰ　　　　　―――→　　文番号１０００か出現　　｜
｜　　　　　　↓　　　　　　　　　　　　　した。テーブルＢで１０　｜
｜　　　　　ＡＤＲＳ　ＯＰ　　　　　　　　００を記憶しているアド　｜
｜　　　　　２Ｃ８３　２１ｎｎｎｎ　　　　レスを探し、そのアドレ　｜
｜　　　　　２Ｃ８６　ＣＤｎｎｎｎ　　　　スに１０００番のアドレ　｜
｜　　　　　　　　　　　　　　　　　　　　スを与える。　　　　　　｜
｜　　　　　　　　　　　　　　　　　　　　　テーブルＡに文番号と　｜
｜　　　　　　　　　　　　　　　　　　　　アドレスを記憶させる。　｜
｜　　　　　　　　　　　　　　　　　　　　テーブルＢでアドレスを　｜
｜　　　　　　　　　　　　　　　　　　　　与えたテーブルを消す。　｜
・−−−−−−−−−−−−−−−−−−−−−−−−−−−−−−−−・
ＧＯＴＯ文が出現すると、
まず現在までに出現した文番号テーブルＡをサーチし、
目的文番号のアドレスを捜します。
その結果、目的の文番号のアドレスがみつかれば、
そのアドレスに展開して、終了します。
目的文番号がみつからない場今は、とりあえず文番号そのままを展開し、
その展開したアドレスとまだ出現していない文番号を、
一時的にテーブルＢへ記憶させます。

コンパイルを続け、
目的文番号が出現すると物理的アドレスが決定されるので、
まず、テーブルＢから生成すべきアドレスを捜しだし、
そのアドレスに、本来入るべきアドレスを展開します。
次に、テーブルＡへ決定されたアドレスと文番号を転送し、
テーブルＢからそれを抹消します。
こうしておくことによって
１パス型でもアドレス生成か充分に行なえることが理解できることと思います。


２）ＩＦ文
ＩＦ文は（　）の中の条件によって飛び先を変える文なので、
基本的には式評価とＧＯＴＯ文を合わせたものと考えられます。
ＩＦ文は（　）の式を展開し、その結果で擬似的にフラグをセットします。
・−−−−−−−−−−−−−−−−−・
｜　　　｜式の展開｜　　　　　　　　｜
｜　　　・――――・　　　　　　　　｜
｜　　　ＪＰ　Ｍ，ｎｎｎｎＨ　　　　｜
｜　　　ＪＰ　Ｚ，ｎｎｎｎＨ　　　　｜
｜　　　ＪＰ　ｎｎｎｎＨ　　　　　　｜
・−−−−−−−−−−−−−−−−−・
式の展開後、条件ジャンプ命令を展開します。
ｎｎｎｎＨの飛び先アドレス生成の方法はまったくＧＯＴＯ文と同じで、
事実、それと同じルーチンを使用しています。
ＩＦ文の展開は、この算術型ＩＦしかないので、
比較的簡単に行なえます。
もっとも、ＢＡＳＩＣのようなＩＦ−ＴＨＥＮ構文も、
そう複雑な処理は必要ないように思えますが………。


３）ＣＡＬＬ文
ＣＡＬＬ文は、展開されたマシン・コードのレベルでも
ＣＡＬＬとして存在します。
・−−−−−−−−−−−−−−−−−−−−−−−−−−−・
｜ソース→ＣＡＬＬ　１００　　　　　　　　　　　　　　　｜
｜　　　　　↓　　　　　　　　　　　　　　　　　　　　　｜
｜マシン・コード→ＣＡＬＬ　ｎｎｎｎＨ……ＣＤ　ｎｎｎｎ｜
・−−−−−−−−−−−−−−−−−−−−−−−−−−−・
これの処理はいたって簡単で、
基本的にＧＯＴＯ文と何ら変わるところがありません。
つまり、ＦＯＲＭのＣＡＬＬ　文は、
ＢＡＳＩＣのＧＯＳＵＢとまったく同じで、
参照サブルーチンは文番号で与えられるからです。
したがって、ＧＯＴＯ文と違うところは
展開されたときマシン・コードのみです。
・−−−−−−−−−−−−−−−−−−−−−−−−−・
｜　ＧＯＴＯ文→ＪＰ　　　ｎｎｎｎ→Ｃ３　ｎｎｎｎ　｜
｜　ＣＡＬＬ文→ＣＡＬＬ　ｎｎｎｎ→ＣＤ　ｎｎｎｎ　｜
・−−−−−−−−−−−−−−−−−−−−−−−−−・


４）ＲＥＴＵＲＮ
ＲＥＴＵＲＮはＣＡＬＬ文で呼ばれたサブルーチンの最後に書き、
メイン・ルーチンに復帰するときに使用します。
ＲＥＴＵＲＮを展開すると、次のようになります。
・−−−−−−−−−−−−−−−−−・
｜　　ＲＥＴＵＲＮ　　　　　　　　　｜
｜　　　　↓　　　　　　　　　　　　｜
｜　　　ＲＥＴ→Ｃ９Ｈ　　　　　　　｜
・−−−−−−−−−−−−−−−−−・
ＲＥＴＵＲＮの展開されたコードはＣ９です。
これは、ＣＡＬＬ文を展開したときにＣＡＬＬ（ＣＤ）で、
サブルーチンを呼んでいますから、メインヘ戻るときにはＣ９のみでいいからです。
ＲＥＴＵＲＮは単にＣ９を展開するだけで、特別な処理は何も行なっていません。
ＣＡＬＬで呼ばれていないのにＲＥＴＵＲＮ文を実行すると
どうなるのでしょうか。
私たちの実験では、完全に暴走しました。
気をつけてください．


５）ＤＯループ
ＦＯＲＭでは、ＤＯループのネスティングを６レベルまでしか許していません。
ＤＯループを展開するためには
ＤＯ文と端末文とを考慮しなければなりません。
まずＤＯ文について見てみましょう。
ＤＯ文の展開は単なるパラメータのセットのみに終わっています。
次のＤＯ文を展開してみましょう。
・−−−−−−−−−−−−−−−−−−−・
｜　　ＤＯ　１０　Ｉ＝１０，１００，２　｜
｜　　　　　　　　　↓　　　　　　　　　｜
｜　　ＬＤ　　　　ＨＬ，１０Ｄ　　　　　｜
｜　　ＬＤ　　　　（ＶＡＲＩ），ＨＬ　　｜
｜　　ＬＤ　　　　ＨＬ，１００Ｄ　　　　｜
｜　　ＬＤ　　　　（ＤＰ１），ＨＬ　　　｜
｜　　ＬＤ　　　　ＨＬ，２Ｄ　　　　　　｜
｜　　ＬＤ　　　　（ＤＰ２），ＨＬ　　　｜
・−−−−−−−−−−−−−−−−−−−・
ＤＯ文の処理はパラメータを各テーブルに記憶させることしか行ないません。
ＤＰ１は終値パラメータ・テーブル、
ＤＰ２は増分パラメータ・テーブルで、
増分パラメータが省略されたときは、１をＤＰ２にセットするように
展開されます。
ＤＯ文は必ず端末文と対で使用しますが、
多くのＤＯ文が同じ端末文を指定できるようになっています。
ＤＯの端末文は文番号によって指定されるので、
端末文を捜し出す手法はＧＯＴＯ文と同じです。
ＤＯループの中で一番重要なのが端末文の処理で、
ここのところはよく考えないといけません。
端末文は基本的に、次のようなことを行ないます。
ループ変数に増分パラメータを加え、終値パラメータと比較します。
この結果、ループの終わりであればループを終了し、
終わりでなければループの中を再実行します。
この端末文を展開すると次のようになります。
・−−−−−−−−−−−−−−−−−−−−−・
｜　　　　　　ＤＯ　１０　１＝１，１０，１　｜
｜　　　１０　ＣＯＮＴＩＮＵＥ　　　　　　　｜
｜　　　　　　　　　↓　　　　　　　　　　　｜
｜　　　　　　ＬＤ　　ＨＬ，（ＶＡＲＩ）　　｜
｜　　　　　　ＬＤ　　ＢＣ，（ＤＰ２）　　　｜
｜　　　　　　ＬＤ　　ＤＥ，（ＤＰ１）　　　｜
｜　　　　　　ＡＤＤ　ＨＬ，ＢＣ　　　　　　｜
｜　　　　　　ＬＤ　　（ＶＡＲＩ），ＨＬ　　｜
｜　　　　　　ＸＯＲ　　　　　　　　　　　　｜
｜　　　　　　ＥＸ　　ＤＥ，ＨＬ　　　　　　｜
｜　　　　　　ＳＢＣ　ＨＬ，ＤＥ　　　　　　｜
｜　　　　　　ＪＰ　Ｃ，ＥＮＴＲＹ　　　　　｜
・−−−−−−−−−−−−−−−−−−−−−・
ＥＮＴＲＹはＤＯ文の次の文を指しています。


６）ＣＯＮＴＩＮＵＥ文
この文は実行文の中に含まれますか、
何も実行しない文として扱われ、
ＤＯ、ＧＯＴＯ、ＣＡＬＬの飛び先として使用されるダミーです。
この文は、ＤＯの端末文としてよく使用されます。
この文はコンパイルしても何のオブジェクトも生成しませんから、
プログラム中、どこにあっても影響はありません。
この文は文番号がついていて、
参照されるときだけテーブルにアドレスのみを記憶させます。


７）ＢＲＥＡＫ文
ＦＯＲＭはオブジェクト・コードに展開されてしまうと、
完全にマシン語になってしまいます。
ですから、ＢＡＳＩＣのように実行途中で止めることはできません。
したがって、途中で止めることがあらかじめ予想されるような場合に、
ＢＲＥＡＫ文を入れておき、[ＢＲＥＡＫ]キーをチェックします。
このＢＲＥＡＫを展開すると次のようになります。
・−−−−−−−−−−−−−−−−−・
｜　　ＢＲＥＡＫ　　　　　　　　　　｜
｜　　　　↓　　　　　　　　　　　　｜
｜　　ＣＡＬＬ　ＢＲＫＳＵＢ　　　　｜
・−−−−−−−−−−−−−−−−−・
ＢＲＫＳＵＢは[ＢＥＲＡＫ]キーのみをチェックするためのサブルーチンで、
このキーが押されている場合のみ、メッセージを出力し、
プログラムを強制的に終了させます。
キーが押されていなければリターンします。


８）ＲＥＳＧ、ＳＥＴＧ文
ＭＺ−８０は擬似グラフィック・キャラクタを使用して、
８０×５０のグラフィックが表示できます。
このグラフィック・キャラクタは１キャラクタを４分割して
表わしています（図２）。
１６進数のＦｎで、ｎの４ビットはそれぞれ各ビットに対応しています（図３）。
１ドットを画面に書く場合、そのキャラクタとＯＲを取って、
その結果に対応するキャラクタを同じ位置へ戻します。
この文を展開すると次のようになります。
・−−−−−−−−−−−−−−−−−−−−−−−−・
｜　　　ＲＥＳＧ　￣｜（式１，式２）　　　　　　　｜
｜　　　ＳＥＴＧ　＿｜（Ａ，Ｂ）　　　　　　　　　｜
｜　　　　　↓　　　　　　　　　　　　　　　　　　｜
｜　　　ＬＤ　　ＨＬ，（ＶＡＲＡ）｜　ｏｒ　式１　｜
｜　　　ＥＸ　　ＤＥ，ＨＬ　　　　　　　　　　　　｜
｜　　　ＬＤ　　ＨＬ，（ＶＡＲＢ）｜　ｏｒ　式２　｜
｜　　　ＬＤ　　Ｄ，Ｌ　　　　　　　　　　　　　　｜
｜　　　ＥＸ　　ＤＥ，ＨＬ　　　　　　　　　　　　｜
｜　　　　　　　｜￣ＲＥＳＳＵＢ　　　　　　　　　｜
｜　　　ＣＡＬＬ｜　　　　　　　　　　　　　　　　｜
｜　　　　　　　｜＿ＳＥＴＳＵＢ　　　　　　　　　｜
・−−−−−−−−−−−−−−−−−−−−−−−−・
ＲＥＳＳＵＢ、ＳＥＴＳＵＢではＨとＬにドットのポジションが入っていますから、
このサブルーチンでは先ほど述べた通りの処理を行ないます。


図２　擬似グラフィック・キャラクタとコードの関係
・−−−−−−−−−−−−−−−−−−−−−−−−・
｜　Ｆ０→　□□　　Ｆ１→　■□　　Ｆ２→　□■　｜
｜　　　　　□□　　　　　　□□　　　　　　□□　｜
｜　　　　　　　　　　　　　　　　　　　　　　　　｜
｜　Ｆ３→　■■　　Ｆ４→　□□　　Ｆ５→　■□　｜
｜　　　　　□□　　　　　　■□　　　　　　■□　｜
｜　　　　　　　　　　　　　　　　　　　　　　　　｜
｜　Ｆ６→　□■　　Ｆ７→　■■　　Ｆ８→　□□　｜
｜　　　　　■□　　　　　　■□　　　　　　□■　｜
｜　　　　　　　　　　　　　　　　　　　　　　　　｜
｜　Ｆ９→　■□　　ＦＡ→　□■　　ＦＢ→　■■　｜
｜　　　　　□■　　　　　　□■　　　　　　□■　｜
｜　　　　　　　　　　　　　　　　　　　　　　　　｜
｜　ＦＣ→　□□　　ＦＤ→　■□　　ＦＥ→　□■　｜
｜　　　　　■■　　　　　　■■　　　　　　■■　｜
｜　　　　　　　　　　　　　　　　　　　　　　　　｜
｜　ＦＦ→　■■　　　　　　　　　　　　　　　　　｜
｜　　　　　■■　　　　　　　　　　　　　　　　　｜
｜　　　注）１６進数は、ディスプレイ・コードです。｜
・−−−−−−−−−−−−−−−−−−−−−−−−・

図３　グラフィック・パターンと各ピット位置の関係
・−−−−−−−−−−−−−−−−−−−・
｜　　　　　　　　＿＿＿　　　　　　　　｜
｜　　ビット１→｜　｜　｜←ビット２　　｜
｜　　　　　　　｜−＋−｜　　　　　　　｜
｜　　ビット３→｜　｜　｜←ビット４　　｜
｜　　　　　　　　￣￣￣　　　　　　　　｜
・−−−−−−−−−−−−−−−−−−−・


９）ＷＲＩＴＥ文
ＦＯＲＭは標準ＦＯＲＴＲＡＮと違い、ＦＯＲＭＡＴ文は存在しません。
そのため、ＷＲＩＴＥ文にＦＯＲＭＡＴ的要素を含める形式で、
ＷＲＩＴＥ文を記述するようになっています。
ＦＯＲＭは１６ピットの整数しか扱えないので、
ＦＯＲＭＡＴＴＩＮＧする数は多くありません。
ＦＯＲＭＡＴＴＩＮＧするのは、
・−−−−−−−−−−−−−−−−−−−−−−−−−−−−−・
｜　１０進、１６進、ＣＨＲ、ＴＡＢ、ＣＲ、文字列、カーソル　｜
・−−−−−−−−−−−−−−−−−−−−−−−−−−−−−・
の７つです。
これの記述形式は次のように定義します。
・−−−−−−−−−−−−−−−−−−−−−−・
｜　　ＥＸＰ．Ｉｎ　１０進　　　　　　　　　　｜
｜　　ＥＸＰ．Ｂｎ　１６進　　　　　　　　　　｜
｜　　ＥＸＰ．Ａｎ　ＣＨＲ　　　　　　　　　　｜
｜　　ＥＸＰ．Ｘ　　ＴＡＢ　　　　　　　　　　｜
｜　　ＥＸＰ．Ｖ　　カーソル・バーチカル　　　｜
｜　　ＥＸＰ．Ｈ　　カーソル・ホリゾンタル　　｜
｜　　／　　　　　　ＣＲ　　　　　　　　　　　｜
｜　　”〜”　　　　文字列　　　　　　　　　　｜
・−−−−−−−−−−−−−−−−−−−−−−・
ＷＲＩＴＥ文中、これらの要素は複数個記述することができ、
それぞれのセパレータは『，』です。
ｎは桁数ですが、Ｂは２または４、
Ａは１または２の数値しか使用できません。
これを展開すると次のようになります。
・−−−−−−−−−−−−−−−−−−−−−−−−−−・
｜(１)１０進　　　　　　　　　　　　　　　　　　　　　｜
｜　　　　　Ａ．Ｉ１０　　　　　　　　　　　　　　　　｜
｜　　　　　　　↓　　　　　　　　　　　　　　　　　　｜
｜　　　　ＬＤ　　　ＨＬ，（ＶＡＲＡ）　　　　　　　　｜
｜　　　　ＬＤ　　　Ａ，０ＡＨ　　　　　　　　　　　　｜
｜　　　　ＣＡＬＬ　ＤＥＣＭＡＬ　　　　　　　　　　　｜
｜　　　　　　　　　　　　　　　　　　　　　　　　　　｜
｜(１)１６進　　　　　　　　　　　　　　　　　　　　　｜
｜　　　　　３２７６７．Ｂ４　　　　　　　　　　　　　｜
｜　　　　　　　↓　　　　　　　　　　　　　　　　　　｜
｜　　　　ＬＤ　　　ＨＬ，７ＦＦＦＨ　　　　　　　　　｜
｜　　　　ＬＤ　　　Ａ，４Ｈ　　　　　　　　　　　　　｜
｜　　　　ＣＡＬＬ　ＨＥＸＰＲＴ　　　　　　　　　　　｜
｜　　　　　　　　　　　　　　　　　　　　　　　　　　｜
｜(３)ＣＨＲ　　　　　　　　　　　　　　　　　　　　　｜
｜　　　　　１．Ａ１　　　　　　　　　　　　　　　　　｜
｜　　　　　　　↓　　　　　　　　　　　　　　　　　　｜
｜　　　　ＬＤ　　　ＨＬ，１Ｈ　　　　　　　　　　　　｜
｜　　　　ＬＤ　　　Ａ，１Ｈ　　　　　　　　　　　　　｜
｜　　　　ＣＡＬＬ　ＣＨＲＰＲＴ　　　　　　　　　　　｜
｜　　　　　　　　　　　　　　　　　　　　　　　　　　｜
｜(４)ＴＡＢ　　　　　　　　　　　　　　　　　　　　　｜
｜　　　　　２０．Ｘ　　　　　　　　　　　　　　　　　｜
｜　　　　　　　↓　　　　　　　　　　　　　　　　　　｜
｜　　　　ＬＤ　　　ＨＬ１４Ｈ　　　　　　　　　　　　｜
｜　　　　ＣＡＬＬ　ＴＡＢＳＵＢ　　　　　　　　　　　｜
｜　　　　　　　　　　　　　　　　　　　　　　　　　　｜
｜(５)カーソル｜Ｖ｜　　　　　　　　　　　　　　　　　｜
｜　　　　　　｜Ｈ｜　　　　　　　　　　　　　　　　　｜
｜　　　　１０．｜Ｈ｜　　　　　　　　　　　　　　　　｜
｜　　　　　　　｜Ｖ｜　　　　　　　　　　　　　　　　｜
｜　　　　　　　↓　　　　　　　　　　　　　　　　　　｜
｜　　　　ＬＤ　　　ＨＬ，０ＡＨ　　　　　　　　　　　｜
｜　　　　ＣＡＬＬ　ＣＥＲＳＬＨ　ｏｒ　ＣＥＲＳＬＶ　｜
｜　　　　　　　　　　　　　　　　　　　　　　　　　　｜
｜(６)ＣＲ　　　　　　　　　　　　　　　　　　　　　　｜
｜　　　　　　　／　　　　　　　　　　　　　　　　　　｜
｜　　　　　　　↓　　　　　　　　　　　　　　　　　　｜
｜　　　　ＣＡＬＬ　ＣＲＯＵＴ　　　　　　　　　　　　｜
｜　　　　　　　　　　　　　　　　　　　　　　　　　　｜
｜(７)文字列　　　　　　　　　　　　　　　　　　　　　｜
｜　　　　　”ＡＢＣＤ”　　　　　　　　　　　　　　　｜
｜　　　　　　　↓　　　　　　　　　　　　　　　　　　｜
｜　　　　ＣＡＬＬ　ＳＴＲＰＲＴ　　　　　　　　　　　｜
｜　　　　ＤＥＦＭ　’ＡＢＣＤ’　　　　　　　　　　　｜
｜　　　　ＤＥＦＢ　０　　　　　　　　　　　　　　　　｜
・−−−−−−−−−−−−−−−−−−−−−−−−−−・
ＷＲＩＴＥ文は“ＷＲＩＴＥ”そのものを展開せず、
ＦＯＲＭＡＴ的部分を展開することによって、その処理を終了します。


１０）ＲＥＡＤ文
ＲＥＡＤ文はＷＲＩＴＥ文とまったく同じ処理を行ないます。
ＦＯＲＭのＲＥＡＤ文はＢＡＳＩＣのＩＮＰＵＴ文と同じように、
文字列の出力が可能となっています。
ＲＥＡＤのＦＯＲＭＡＴＴＩＮＧの形式は次のように定義してあります。
この形式はＣＲ、文字列出力を含め、５つの形式があります。
・−−−−−−−−−−−−−−−−−−−−−−・
｜　　ＶＡＲ．Ｉ　　１０進入力　　　　　　　　｜
｜　　ＶＡＲ．Ｂ　　１６進入力　　　　　　　　｜
｜　　ＶＡＲ．Ａｎ　文字入力、ｎは１ｏｒ２　　｜
・−−−−−−−−−−−−−−−−−−−−−−・
ＣＲ、文字列出力は、ＷＲＩＴＥ文と同じルーチンを共用しています。
・−−−−−−−−−−−−−−−−−−−−・
｜(１)１０進入力　　　　　　　　　　　　　｜
｜　　　　Ａ．Ｉ　　　　　　　　　　　　　｜
｜　　　　　↓　　　　　　　　　　　　　　｜
｜　　　　ＣＡＬＬ　ＤＥＣＩＮＰ　　　　　｜
｜　　　　ＬＤ　　　（ＶＡＲＡ），ＨＬ　　｜
｜　　　　　　　　　　　　　　　　　　　　｜
｜(２)１６進入力　　　　　　　　　　　　　｜
｜　　　　Ａ．Ｂ　　　　　　　　　　　　　｜
｜　　　　　↓　　　　　　　　　　　　　　｜
｜　　　　ＣＡＬＬ　ＨＥＸＩＮＰ　　　　　｜
｜　　　　ＬＤ　　　（ＶＡＲＡ），ＨＬ　　｜
｜　　　　　　　　　　　　　　　　　　　　｜
｜(３)文字入力　　　　　　　　　　　　　　｜
｜　　　　Ｂ．Ａ２　　　　　　　　　　　　｜
｜　　　　　↓　　　　　　　　　　　　　　｜
｜　　　　ＬＤ　　　Ａ，０２Ｈ　　　　　　｜
｜　　　　ＣＡＬＬ　ＣＨＲＩＮＰ　　　　　｜
｜　　　　ＬＤ　　　（ＶＡＲＢ），ＨＬ　　｜
｜　　　　　　　　　　　　　　　　　　　　｜
・−−−−−−−−−−−−−−−−−−−−・


１１）ＳＴＯＰ文
ＳＴＯＰ文はプログラムの終了を表わす文で、
実行文の中に含まれ、プログラム中どこにあってもかまいません。
プログラムがＳＴＯＰ文で終了すると
・−−−−−−−−−−−−−−−−−・
｜　　ＳＴＯＰ　１　２　３　　　　　｜
｜　　　　　　　￣￣￣￣￣　　　　　｜
｜　　　　　　　　１０進　　　　　　｜
・−−−−−−−−−−−−−−−−−・
と出力され，これを展開すると次のようになります。
・−−−−−−−−−−−−−−−−−・
｜　　ＳＴＯＰ　１２３　　　　　　　｜
｜　　　　　　　￣￣￣　　　　　　　｜
｜　　　　↓　　　↓　　　　　　　　｜
｜　　ＬＤ　　　ＨＬ，７ＢＨ　　　　｜
｜　　ＣＡＬＬ　ＳＴＯＰＳＢ　　　　｜
・−−−−−−−−−−−−−−−−−・
ＳＴＯＰの後に１０進数が出力されるのは
ＦＯＲＴＲＡＮのＳＴＯＰと同じようにしたためです。


―――――――――――――――――――
　　　　　最　後　に
―――――――――――――――――――
ここまで読んで感じていると思いますが、
各ステートメントの展開は非常に単純に行なわれています。
ステートメント処理のほとんどはサブルーチンに押しつけてしまい、
コンパイルのスピードを上げています。